home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 / Ham Radio 2000.iso / ham2000 / packet / terminal / top_152 / src152.exe / rar / TOPOVR2.PAS < prev    next >
Pascal/Delphi Source File  |  1995-05-16  |  3KB  |  102 lines
  1. {┌─────────────────────────────────────────────────────────────────────────┐}
  2. {│                                                                         │}
  3. {│                              T. O. P.                                   │}
  4. {│                                                                         │}
  5. {│                        (T)he  (O)ther  (P)acket                         │}
  6. {│                                                                         │}
  7. {│ Unit:  T O P O V R 2 . P A S                                            │}
  8. {│                                                                         │}
  9. {│                                                                         │}
  10. {│ Programmcode, der aus dem Overlayteil nachgeladen wird                  │}
  11. {└─────────────────────────────────────────────────────────────────────────┘}
  12.  
  13.  
  14. UNIT TOPOVR2;
  15. {$F+,O+}
  16.  
  17. Interface
  18.  
  19. Uses CRT,
  20.      DOS,
  21.      OVERLAY,
  22.  
  23.      TOPEMS,
  24.      TOPXMS,
  25.      TOPDEFS;
  26.  
  27.  
  28. (* Proceduren und Funtionen der TOPLOAD.PAS *)
  29. Procedure Emblem_Zeigen;
  30. Procedure Ini_Start_Tnc;
  31. Procedure Switch_Hostmode(V24Nr,TNC_Nr : Byte);
  32. Procedure TNC_High_Channel_Init;
  33. Procedure DRSI_Hostmode(TNC_Nr,Art : Byte);
  34. Procedure Configlesen;
  35. Procedure Infos_Lesen;
  36. Procedure Strings_Lesen;
  37. Procedure AttributFile_Lesen;
  38. Procedure ESC_Lesen;
  39. Procedure QRG_Lesen;
  40. Procedure REM_Lesen;
  41. Procedure PWD_Lesen;
  42. Procedure HELP_Lesen;
  43. Procedure MAK_Lesen;
  44. Procedure TncIni(Art : Byte);
  45. Procedure Abschluss_TOP;
  46. Procedure Abbruch_TOP(Nr : Byte; Zeile : str80);
  47. Procedure ScrFile_erzeugen;
  48. Procedure LineRead(Fstr : Str10);
  49. Function  HeapFrei(Bedarf : LongInt) : Boolean;
  50. Procedure Config_Verz_Lesen;
  51. Procedure Config_Allg_Lesen;
  52. Procedure Config_Ton_Lesen;
  53. Procedure Config_TNC_Lesen;
  54. Procedure Config_PRN_Lesen;
  55. Procedure Config_RAM_Lesen;
  56. Procedure Config_BLIND_Lesen;
  57. Procedure Puffer_schreiben;
  58. Procedure Puffer_lesen;
  59. Procedure VorCurEnd;
  60. Procedure Interface_Exist;
  61. Procedure GenCrcTab;
  62. Procedure GenPrivPWD;
  63. Procedure UebergabeAuswert;
  64.  
  65.  
  66. (* Proceduren und Funtionen der TOPDOS.PAS *)
  67. Procedure DosAufruf(Var Zeile : Str128; Art : Byte);
  68. Procedure ExecDOS(Zeile : Str128);
  69. Procedure DosBildSave(Zeilen : Byte);
  70. Procedure StoreHeap;
  71. Procedure LoadHeap;
  72. Function  Zeilen_ermitteln : Byte;
  73. Procedure Switch_VGA_Mono;
  74. Procedure Ini_TNC_Text(Art : Byte);
  75.  
  76.  
  77. (* Proceduren und Funtionen der TOPHELP.PAS *)
  78. Procedure Hlp_Laden(Istr : Str6);
  79. Procedure TOP_Help(IDstr : Str6);
  80. Procedure REM_Help(Kanal : Byte; HNr : Byte);
  81. Procedure Send_Hilfe(Kanal : Byte; IDstr : Str6);
  82. Procedure Help_Compile;
  83.  
  84.  
  85. Implementation
  86.  
  87. Uses  TOPACT,
  88.       TOPACT1,
  89.  
  90.       TOPOVR,
  91.       TOPOVR1,
  92.       TOPOVR3,
  93.       TOPOVR4;
  94.  
  95.  
  96. {$I TOPLOAD}
  97. {$I TOPDOS}
  98. {$I TOPHELP}
  99.  
  100.  
  101. End.
  102.